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2. ABSTRACT 



The program Is designed to copy all or part of any DECtape onto any other DECtape. The 
program reads a series of blocks, writes them on the second DECtape, and then rereads them checking for 
an accurate checksum and comparing the information just read with the information originally read. Any 
DECtape or comparison error will cause an identifiable halt. To keep the programming simple and to 
allow maximum space for copying purposes, block number references are entered using the console ACCU- 
MULATOR switches. The program operates on either a 4K or 8K PDP-7. It is not designed for operation 
on a PDP-4. 

3. REQUIREMENTS 

3.1 Storage 

The program occupies approximately the first 1400 locations of core memory but uses the 
remainder of memory through location (1) 7377 for copying and comparison areas. 

3.2 Subprograms 

The program makes use of the PDP-7 Bidirectional DECtape Subroutines (Digital-7-22A-l/0), 
with which the symbolic tape must be assembled. The subroutines are included in the binary tape used for 
running the program . 

3.3 Equipment 

Two DECtape drives attached to a PDP-7 DECtape control are required. The PDP-7 can 
have a 4K or larger memory. 

4. USAGE 

4.1 Loading 

4.1.1 Mount the tape to be copied on a DECtape drive dialed to unit 1 . The drive can be kept 

in WRITE LOCK position. 

4.1 .2 Mount the tape to be copied on a DECtape drive dialed to unit 2. The drive must be write 

enabled. 

4.1 .3 Read in the binary tape by starting at location (1)7770. 

4.1 .4 Set bits 8-1 7 of the ACCUMULATOR switches to the first block to be copied (numbers 1-1100 

only); then start at location 22. 

4.1 .5 When the computer halts, set bits 8-17 of the ACCUMULATOR switches to the last block 

number to be copied, and press CONTINUE. 

4.1 .6 When the computer stops at location 134 with the accumulator and link set to all 1 's, 
copying has been completed. To copy another section, repeat the steps beginning at paragraph 4.1 .4 
using the required set of block numbers. Do not press CONTINUE . 

4.2 Calling Sequence (Not Applicable) 
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4.3 Switch Settings 

The ACCUMUi_ATOR switches must be set to the starting block number before starting at 22, 
and to the final block number after the halt, which occurs immediately. Bits 6-17 are examined even 
though block numbers 1-1 100 only are accepted. 

4.4 The program can be restarted any time by setting the ACCUMULATOR switches to the first 
block to be copied and pressing START with the ADDRESS switches set to 22. 



4.5 



Errors in Usage 

The following errors can occur: 



Halt Location 



Meaning 



Procedure 



21 



57 



134 



202 



217 



Illegal CAL instruction. 
Probable machine malfunc- 
tion. 

HALT to allow putting final 
block number in the ACCU- 
MULATOR switches. Not 
an error. 

Final halt. Accumulator and 
link should be all 1 's. 

Interrupt occurred from other 
than DECtape, or a DECtape 
skip command did not func- 
tion correctly. The ACCU- 
MULATOR displays the result 
of an lORS command . 

DECtape error during reading 
of original tape. The contents 
of the ACCUMULATOR lights 
indicate the type of error as 
follows: 

LAW 100 - Format error (should 
never occur) 

LAW 200 - Block number can- 
not be found 

LAW 300 - Non-end-of-tape 
error during 
searching 



Reload the program and start over. 
If condition persists, the computer 
requires maintenance. 

Set ACCUMULATOR switches to 
final block number to be copied, 
and press CONTINUE. 



Repeat program for additional areas 
to be copied, as necessary. 

Start over. If error persists, main- 
tenance should be performed to 
eliminate the spurious flag. 



Press CONTINUE to try operation 
again. If the error is persistent, 
either the DECtape cannot be cop- 
ied or the DECtape system itself is 
malfunctioning. Try copying an- 
other tape or section of tape, if 
possible. 
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Halt Location 



Meaning 



Procedure 



217(cont) 



221 



223 



225 



LAW 400 - Error flag during 
reading 

LAW 500 - Sumcheck error 
during reading 

LAW 600 - Error flag during 
writing 

LAW 700 - Block-mark number 
error during read- 
ing or writing 

Dectape error during writing 
of new tape. See HLT 217 
for decoding of error. 

DECtape error during reread 
of second tape. See HLT 217 
for decoding of error . 

Comparison error. 



Same as above 



Same as above 



Press CONTINUE to reread and 
rewrite the last section. If error 
persists, maintenance is required 



5. 



RESTRICTIONS 



The tapes copied must be in the standard DEC format of 1 lOOg blocks of 400o words each . 
Note that block cannot be copied. 



6. 
6.1 



DESCRIPTION 



Discussion 



The program first determines whether or not a 4K machine is used and allocates core loca- 
tions accordingly. If a 4K machine is being used, 3OOO3 locations (6 blocks) are allocated for reading 
and an additional 3OOO3 locations are allocated for checking. If an 8K machine is used, 7OOO3 locations 
(16g blocks) are allocated for each area. 

The copying procedure is as follows: 

1 . Read (1)6 blocks from the original tape, in either direction. 

2. Write the (1)6 blocks on the second tape, in either direction. 

3. Reread the (1)6 blocks from the second tape, in either direction, into an- 
other core area and compare the two areas . 

4. Repeat steps 1-3 until all requested blocks have been transferred, then halt. 



Digital-7-?4-U 

Page 4 



6.2 



Applications 



The program can be used to copy any standard type of PDP-4, PDP-6, or PDP-7 DECtape 
without reference to the contents or data format on the tape providing only that the standard block format 
is used. It is, therefore, a fairly fast procedure for copying system tapes or other work tapes. This allows 
duplication of tapes for backup or for distribution to more than one user. 



7. 



8. 



METHODS 

(See Discussion, Section 6) 

FORMAT 



Standard PDP-4, PDP-6, and PDP-7 DECtape block format of llOOs addressable blocks of 
400g (18-bit) words each. 



9. 



Execution Time 



Measurements indicate that a complete reel of tape can be copied and checked in almost 
exactly 3 minutes using an 8K computer, or about 4 minutes and 20 seconds on a 4K computer. 



10. 



PROGRAM 



Program Listing is attached. See Dlgital-7-22A-l/0 for a complete listing of the PDP-7 
Bidirectional Subroutines which are not included with the listing of the Copy program itself. 



10.1 
10.2 
10.3 
10.4 



Core Map (None) 
Dimension List (None) 
Parameter List (None) 
Program Listing 
/TA^E COPY PrOQIRAM 



21/ 



(|02« 



HLT 

CAF 

LAC (JMP INTERR) 

DAC 1 

LAC (NOP) 

DAC 8W1 

DZM 7777 

DZM 17777 

DAC 17777 

SAD 7777 

JMP 903 

LAC (U> 

DAC K1 

LAC (75100) 

DAC K2 

LAC K1 

CMA 



/C! EAR fUAQs 
/SwT UP INTERRUPT 
/SrT 8W1 



/8«<IP IF UK MACHIwI 

/4k machine 

/NiiMBlR or BLOCKS PER PA8i 

/NtiMSER Or wOrDs pIR PASS 
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dac 





/•puock distamce 




LAC 


RUt 


/Start o^ ist rear area 




ADn 


K2 


/3000 CR 7000 




DAC 


R3«1 


/START OF .2ND REAn AREA 




TAD 


(•0) 


/Subtract \ 




DAC 


R1 


/EwD Or 18T RfAD A«EA 




DAC 


R2 






ADO 


K2 


/3000 nR 7000 




DAC 


R3 


/EmD op 2nd RrAD AREA 




LAS 




/STARTING BLOCK 




AND 


(7?77> 






ADD 









DAC 


iN 


/StARTINQ block. BlOcK Dl 




MLT 




/PUT In Final blOck 




LAS 




/LAST BLOCK 




AND 


(7777) 






DAC 


K2 






JMP 


SW1*1 




Q03, 


LAC 


<6) 






DAC 


K1 






lac 


(3000) 






JMP 


Q02 




/R£A5 DATA 








Rft), 


JMS 


HMRDS 


/READ 




LAC 


Run 


/bi'ock number 




JMP 


fRRl 


/ERROR RETURN 




1000@) 


/UwiT 




RA1 




/FtRST ADDRESS 


R1# 


RA1 




/LnST ADDRESS, MOnlFlEO 




JMS 


WAIT 




R1A. 


JMS 


MMWRS 


/WRITE 




LAC 


RN 


/srOCK NUMBER 




JMP 


CRR2 


/ERROR RETURN 




80000 


/UmIT 




RA1 




/FfRST ADDRESS, 


^8f 


RA1 




/LAST ADDRESS. MODIFIED 




JMS 


WAIT 




R2A. 


JMS 


mmrOS 


/rEad asain 




LAC 


BN 


/Bi'OCK NUMBER 




JMP 


rRR3 


/EPROR RETURN 




20000 


/UMiT 




RA2 




/FTRST ADDRESS, MnDlFlED 


»«• 


RA2 




/LAST ADDRESS, MODIFIED 




JMS 


WAIT 




/COMPARE THE 


Two AREAS 






LAW 


RAl-1 






DAC 


AX1 


/START OF FiRfiT ArEa 




LAM 








TAD 


R3»1 






DAC 


AX8 


/START OF 2nd AREa 




LAC 


R3 






CMA 








ADD 


R3»1 






DAC 


CI 


/COUNTER 
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R4# 


LAC 


I AX1 




SAD 


I AX2 




SKP 






JMP ! 


fRR4 




18? 1 


C#1 




JMP 1 


R4 


swi. 


NOP 






LAC 


RN) 




ADD 


K«1 




DAC 


BN 




ADD 


K1 




CMA 






ADD 


K42 




ADD 


(M 




SMAVCLL 




JMP 


R0 




ADD 


K1 




RTL 






PTL 






PTL 






PTL 






TAD 


(•0) 




DAC 


K1 




LAC 


R1»t 




ADD 


Kf 




DAC 


R1 




DAC 


R2 




LAC 


R3«1 




ADO 


K1 




DAC 


R3 




LAC 


(STLVclCVHLT) 




DAC 


SW1 




JMP 


Re 


INTKRR, 


DAC 


ACS-^AVC 




MMPF 




SKP 






JMP 


I MMERR 




MMDF- 




SKP 






JMP 


I MMDATA 




MMPF 




SKP 






JMP 


1 MMBLF 




lOPS 


It, 


HLT 
CAr 




DISm!S«JMP , 








LAC 


w 




PAL 






LAC 


ACSAVC 




lOM 






JMP 


I f? 



/ERROR 

/OR HLT 

/ChNSTaNT BLOCK AmOUNT 

/CriNSTANT BLOCK AmOUMT 

/ptnal block 

/last section to t«an8rer 
/Transfer next 
/constant block amognt 
/multiply by 400 



/SUBTRACT 1 
/TrMPORARv STftRAOr 



/ImTERRUPT ERROR 



MMAPTIi 



WAIT 







LAC 


I MMWA1 






ISf 


mmdone 






JMP 


.«2 






JMP 


I WAIT 


f«Rl* 




MLT 








JMP 


R0 


ERR?; 




HIT 








JMP 


R1A 


errs; 




HLT 








JMP 


R2A 


ERR4; 




MLT 








JMP 


R0 


Axiiia 








AX2tAXt«1 








RAlii400 








RA29RAU3000 






START 








11. 


DIAGRAM 


(None) 


12. 


REFERENCES (None) 
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/EwR DURiNQ Initial read 

/EpR DDRInQ WrITImQ 

/E(»R DuRlNlQ 2mD RrAD 

/CflMPAPlSON IrROR 



